Program test;
var
	a, b, c, d : integer;
	r, s, t, u, v, w, x, y, z : real;
Begin
    a:=3;
End.
